﻿Public Class drogaRelatorioVO

    Private _id_droga_Relatorio As Integer
    Private _id_registro As Integer
    Private _data_registro As Date
    Private _id_droga As Integer
    Private _massa As Double
    Private _resultado As Boolean
    ' MÉTODO CONSTRUTOR SEM PARAMETROS
    '-------------------------------------

    Sub New()
        _id_droga_Relatorio = Nothing
        _id_registro = Nothing
        _data_registro = Nothing
        _id_droga = Nothing
        _massa = Nothing
        _resultado = Nothing
    End Sub

    '-------------------------------------
    ' MÉTODO CONSTRUTOR COM PARAMETROS
    '-------------------------------------

    Sub New(ByVal id_droga_relatorio As Integer, _
            ByVal id_registro As Integer, _
            ByVal data_registro As Date, _
            ByVal id_droga As Integer, _
            ByVal massa As Double, _
            ByVal resultado As Boolean)

        _id_droga_Relatorio = id_droga_relatorio
        _id_registro = id_registro
        _data_registro = data_registro
        _id_droga = id_droga
        _massa = massa
        _resultado = resultado

    End Sub

    Public Property ID_DROGA_RELATORIO As Integer
        Get

            Return _id_droga_Relatorio

        End Get
        Set(ByVal value As Integer)

            _id_droga_Relatorio = value

        End Set
    End Property

    Public Property ID_REGISTRO() As Integer
        Get
            Return _id_registro
        End Get
        Set(ByVal value As Integer)

            _id_registro = value
        End Set
    End Property

    Public Property DATA_REGISTRO() As Date
        Get
            Return _data_registro
        End Get
        Set(ByVal value As Date)

            _data_registro = value
        End Set
    End Property
    Public Property ID_DROGA() As Integer
        Get
            Return _id_droga
        End Get
        Set(ByVal value As Integer)

            _id_droga = value
        End Set
    End Property
    Public Property MASSA() As Double
        Get
            Return _massa
        End Get
        Set(ByVal value As Double)

            _massa = value
        End Set
    End Property

    Public Property RESULTADO() As Boolean
        Get
            Return _resultado
        End Get
        Set(ByVal value As Boolean)

            _resultado = value
        End Set
    End Property
   
End Class
